home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / emula / arosdv19.lha / AROS / crypt.c < prev    next >
C/C++ Source or Header  |  1996-09-12  |  779b  |  37 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: crypt.c,v 1.3 1996/08/16 14:01:40 digulla Exp $
  4.     $Log: crypt.c,v $
  5.     Revision 1.3  1996/08/16 14:01:40  digulla
  6.     The salt may be specified now
  7.  
  8.     Revision 1.2  1996/08/01 17:40:38  digulla
  9.     Added standard header for all files
  10.  
  11.     Desc:
  12.     Lang:
  13. */
  14. #include <unistd.h>
  15. #include <stdio.h>
  16.  
  17. int main (int argc, char ** argv)
  18. {
  19.     char salt[3];
  20.     char * set = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789./";
  21.  
  22.     srand (time (NULL));
  23.  
  24.     salt[0] = set[getpid() % sizeof(set)];
  25.     salt[1] = set[rand() % sizeof(set)];
  26.     salt[2] = 0;
  27.  
  28.     if (argc > 2)
  29.     {
  30.     salt[0] = argv[2][0];
  31.     salt[1] = argv[2][1];
  32.     }
  33.  
  34.     printf ("Encrypting %s: %s\n", argv[1], crypt (argv[1], salt));
  35. }
  36.  
  37.